home *** CD-ROM | disk | FTP | other *** search
/ CU Amiga Super CD-ROM 19 / CU Amiga Magazine's Super CD-ROM 19 (1998)(EMAP Images)(GB)[!][issue 1998-02].iso / CUCD / Readers / Gui4Cli / Docs / Tutorials / Cycler.gc < prev    next >
Text File  |  1997-12-02  |  1KB  |  47 lines
  1. G4C
  2.  
  3. WinBig -1 -1 250 100 "Cycler.gc"
  4. WinType 11110001
  5.  
  6. BOX 0 0 0 0 OUT RIDGE
  7.  
  8. xonLoad 
  9. GuiOpen Cycler.gc
  10.  
  11. xonClose
  12. GuiQuit Cycler.gc
  13.  
  14. Text 90 6 100 12 'Cyclers' 7 NOBOX
  15.  
  16. ;        Cycler arguments
  17. ;        L   T  W   H     Title    Variable
  18. ;        |   |  |   |       |         |
  19. xCycler 110 30 100 14 'If this is' country
  20. CSTR "Greece"  0         ; Here are specified the
  21. CSTR "Italy"   1         ; fields which will appear
  22. CSTR "France"  2         ; in the Cycler as it is
  23. CSTR "Germany" 3         ; clicked, and their values
  24. CSTR "Belgium" 4         ; starting from zero.
  25. CSTR "Sweden"  5         ;
  26. CSTR "England" 6         ;
  27. gadid 1
  28. Update Cycler.gc 2 $country
  29.  
  30. ; ---- The two cyclers used here not only cycle through their
  31. ;      own field settings, but also update the other cycler to
  32. ;      match. If, say, day #4 is selected, then the other gadget
  33. ;      will display country #4, and vice versa.
  34. ;      That's done with the "update" commands.
  35.  
  36. xCycler 110 60 100 14 'it must be' day
  37. CSTR "Monday"    0
  38. CSTR "Tuesday"   1
  39. CSTR "Wednesday" 2
  40. CSTR "Thursday"  3
  41. CSTR "Friday"    4 
  42. CSTR "Saturday"  5
  43. CSTR "Sunday"    6
  44. gadid 2 
  45. Update Cycler.gc 1 $day
  46.  
  47.